home *** CD-ROM | disk | FTP | other *** search
/ Amiga Games: Greatest Hits 1996 / Amiga Games: Greatest Hits 1996.iso / userbox / publicdomain / amis / install < prev    next >
Text File  |  1996-05-18  |  3KB  |  134 lines
  1.  
  2. (welcome)
  3.  
  4. (set dest2 (tackon (askdir  (prompt "Select the location to install the AMIS directory")
  5.             (default @default-dest)
  6.                     (help "Choose a destination partition or directory " 
  7.                           "to contain AMIS.  The install program will "
  8.                           "create a directory called 'AMIS' in the "
  9.                           "location you choose and copy the AMIS files "
  10.                           "to it."
  11.                                )
  12.             ) "AMIS")
  13. )
  14.  
  15. (set @default-dest dest2)
  16.  
  17. (makedir dest2 (infos))
  18.  
  19. (copyfiles
  20.   (prompt "Copying...\n")
  21.   (source "")
  22.   (choices "AMIS" "AMIS.guide")
  23.   (dest dest2)
  24.   (infos)
  25.   (files)
  26.   (confirm)
  27.   (help @copyfiles-help)
  28. )
  29.  
  30. (complete 30)
  31.  
  32. (makedir "ENVARC:AMIS")
  33. (makedir "ENV:AMIS")
  34.  
  35. (if (exists "ENVARC:AMIS/AMIS.prefs")
  36.   (
  37.     ( if (askbool (prompt "\nDo you want to overwrite your old\n"
  38.                           "preference files ?")
  39.                   (help ""))
  40.       (
  41.         (copyfiles
  42.           (prompt "Copying preferences...\n")
  43.           (source "ENV/")
  44.           (choices "AMIS.prefs" "def_text.info")
  45.           (dest "ENV:AMIS")
  46.           (files)
  47.           (help @copyfiles-help)
  48.         )
  49.         (copyfiles
  50.           (prompt "Copying preferences...\n")
  51.           (source "ENV/")
  52.           (choices "AMIS.prefs" "def_text.info")
  53.           (dest "ENVARC:AMIS")
  54.           (files)
  55.           (help @copyfiles-help)
  56.         )
  57.       )
  58.     )
  59.   )
  60.   (
  61.     (copyfiles
  62.       (prompt "Copying preferences...\n")
  63.       (source "ENV/")
  64.       (choices "AMIS.prefs" "def_text.info")
  65.       (dest "ENV:AMIS")
  66.       (files)
  67.       (help @copyfiles-help)
  68.     )
  69.     (copyfiles
  70.       (prompt "Copying preferences...\n")
  71.       (source "ENV/")
  72.       (choices "AMIS.prefs" "def_text.info")
  73.       (dest "ENVARC:AMIS")
  74.       (files)
  75.       (help @copyfiles-help)
  76.     )
  77.   )
  78. )
  79.  
  80. (complete 50)
  81.  
  82. (if (askbool
  83.         (prompt "\nWould you like to install the\n"
  84.                 "(GoldED compatible) findfunctions ?")
  85.         (help "")
  86.     )
  87.     ((makedir (tackon dest2 "Findfunctions") (infos))
  88.     (copyfiles
  89.       (prompt "Select the findfunctions you want\nto install")
  90.       (source "Findfunctions/")
  91.       (dest (tackon dest2 "Findfunctions"))
  92.       (all)
  93.       (files)
  94.       (confirm)
  95.       (help @copyfiles-help)
  96.     )
  97.     )
  98. )
  99.  
  100. (complete 70)
  101.  
  102. (copylib
  103.     (prompt "Copying amis.library...")
  104.     (help @copylib-help)
  105.     (source "Libs/amis.library")
  106.     (dest "Libs:")
  107.     (confirm)
  108. )
  109.  
  110. (complete 90)
  111.  
  112. (if (askbool
  113.     (prompt "\nDo you have a keyfile ?")
  114.     (help ""))
  115.     (
  116.         (set keyfile (askfile
  117.             (prompt "Please select your keyfile.")
  118.             (default "")
  119.             (help   "Please select your keyfile.")))
  120.         (if (= 84 (getsize keyfile))
  121.             (copyfiles
  122.                 (prompt "Copying your keyfile...")
  123.                 (source keyfile)
  124.                 (dest dest2)
  125.                 (newname "AMIS_KeyFile"))
  126.             (message "No keyfile selected!\n")
  127.         )
  128.     )
  129. )
  130.  
  131. (complete 100)
  132. (exit)
  133.  
  134.